|
Rund um Autocad : Positionsnummern
itzefitz am 24.01.2005 um 12:51 Uhr (0)
Mahlzeit ihr lieben, ich habe mir letzte woche ein lisp kopiert, funktioniert bis auf einen punkt ganz gut, jetzt kommt das große aber: bei mir ist der text nicht mittig im kreis, sondern versetzt nach oben. ich weiß es liegt am einfügepunkt des textes. frage: wie kann ich im lisp angeben, dass der einfügepunkt beim text mz ist und nicht ul kann mir jemand helfen? (defun C:Pos (/ KREISRADIUS TXT_KORD TXT_KORD TXT_HOEHE TXT_XY START_NUMMER PKT) (setq KREISRADIUS 12.0) (setq TXT_KORD 0.0) (setq T ...
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Symetrielinie
itzefitz am 23.12.2004 um 08:37 Uhr (0)
Guten Morgen, ich bin seit diesem Monat Autocad-Anwenderin (Autocad 2000 / 2002). Was ich suche ist: Eine Funktion oder Lisp, die automatisch eine Symetrielinie zwischen zwei angegebenen Linien erzeugt. Die Linien können parallel oder auch nicht parallel zueinander liegen. Wer kann mir da weiter helfen? Danke und ------------------ Gruß Silvia
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Blockbearbeitung ohne Auflösung
itzefitz am 16.02.2005 um 08:13 Uhr (0)
Hallo CADmium, wie lautet die Befehlseingabe bei diesem Lisp? Ich bekomme es nicht gebacken:-( Ist nicht einfach wenn man s doppelt nimmt:-) ------------------ Gruß Itzefitz
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Positionsnummern in AutoCAD 2002
itzefitz am 15.03.2005 um 12:59 Uhr (0)
Hallo BrettiCAD, versuche es einmal mit diesem Lisp, habe ich vor einiger Zeit in diesem Forum gefunden. Ich finde es ist eine tolle Sache. (defun C:Pos (/ KREISRADIUS TXT_KORD TXT_KORD TXT_HOEHE TXT_XY START_NUMMER PKT) (setq KREISRADIUS 25.0) (setq TXT_KORD 0.0) (setq TXT_HOEHE 20.0) (setq TXT_XY (strcat "@" (rtos TXT_KORD 2 2) "," (rtos TXT_KORD 2 2))) (if (null START_NUMMER) (setq START_NUMMER (getint "
Start Pkt-Nummer: ")) ) (setq PKT t) (while PKT (setq PKT (getpoint (str ...
| | In das Form Rund um Autocad wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
